100 REM ERZEUGT &-FILE, DAS LISTING 2
110 REM (LED-TEST) ENTSPRICHT.
120 :
130 DATA 0,7,12,173,0,28,41,16,74,141
140 DATA 0,28,76,0,7,93
150 OPEN1,8,2,"&,U,W"
160 FORX=1TO16:READA
170 PRINT#1,CHR$(A);:NEXTX
180 CLOSE1